# -*- mode: snippet -*-
# name: shiny sidebar_page
# key: shiny.sidebar_page
# key: shiny_sidebar_page
# contributor: Shuguang Sun
# --
library(shiny)

ui <- fluidPage(
  titlePanel("${1:title}"),

  sidebarLayout(
    sidebarPanel(

    ),
    mainPanel(

    )
  )
)

server <- function(input, output, session) {

}

shinyApp(ui, server)